Top 10k strings from Spectrum Game Writers' Pack (1983)(Collins Educational)[a].tap in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TAP] (TOSEC-v2007-01-01) /

Back to the directory listing

   4  MACBRIDE 1983 <<
   2 WHAT HAS IT HIT ?
   2 THE BLACK HOLE
   2 SPEED ADJUSTMENT
   2 SL1,SC1;" "
   2 Letters to co-ords.
   2 GRAPHICS DEFINITION
   2 ;"Your Hand Value ";v(1
   2 ;"My Hand Value ";v(2
   2 ;"GOODBYE":
   2 (SL,SC)>64
   2 (SL,SC)=58
   2  MACBRIDE <<
   2  MACBRIDE 1982 <<
   1 z(D,l,c+t)>0
   1 z(D,l,c+t)=4
   1 z(D,l,c+t)=2
   1 z(D,l,c)>0
   1 z(D,l,c)=4
   1 z(D,l+t,c)>0
   1 z(D,l+t,c)=3
   1 z(D,l+t,c)=2
   1 totals each line
   1 tl,tc;"boom"
   1 small letters
   1 shoots around hit..
   1 s(y,x)=c(3
   1 s(x,y,z)=2
   1 s(x,y)=c(x,y)
   1 s(x,x)=c(7
   1 s(d,l,c)>0
   1 s(d,l,c)=1
   1 s(d,l+t,c+i)=0
   1 player Wins
   1 no  Move made
   1 l,c-X;"  ":
   1 l+l1,c+c1;
   1 front page
   1 delay between movements
   1 checking for hit
   1 c(x,y)=s(x,y)
   1 background
   1 arrow movement
   1 a scatter of roses
   1 Z(D,L,C)>4
   1 Z(D,L,C)=4
   1 Z(D,L,C)=3
   1 Z(D,L,C)=2
   1 Z(D,L,C)=0
   1 Z array = Comp. board
   1 YOUR TIME WAS ";TI;" SECONDS
   1 YOUR GO.PRESS ANY KEY
   1 YOUR GO. PRESS ANY KEY
   1 WHO STARTS
   1 WHITE DWARF STAGE
   1 W$=D$(H,N)
   1 V(P)=V(P)+V1
   1 V(P)=V(P)+D(P,T)
   1 Transfer - screen array
   1 TO TURN CLOCKWISE"
   1 TO TURN ANTI-CLOCKWISE"
   1 THE WORLD IS ROUND
   1 THE BAT BOUNCE
   1 TARGET ROUTINE
   1 TARGET MOVER
   1 TARGET    9
   1 Start point of Gun
   1 Shows surviving subs
   1 Screen array
   1 Score Display
   1 SWITCH NEEDED ?
   1 SUBS      
   1 STOP CLOCK
   1 START OF MOVEMENT LOOP
   1 START CLOCK.Base count  Crash count
   1 START CLOCK
   1 START AGAIN ?
   1 SPIN ROUTINE
   1 SPEED CONTROL
   1 SPEED -length of BEEP
   1 SPACE     
   1 SL=SL-(D=1
   1 SHIP MOVING UP
   1 SHIP MOVING DOWN
   1 SHIP CO-ORDINATES
   1 SEE LINE 2060
   1 SC=SC+(D=1
   1 S=Switch.Rabbit or duck
   1 S=SWITCH DONE
   1 S(x,y,z)=3
   1 S(D,L,C)>0
   1 S(D,L,C)=2
   1 S array for Comp. shots
   1 Random shot,if no space found. Failsafe device
   1 Random hops
   1 Random Ducks or rabbits
   1 RUB OUT GUN
   1 RANDOM SHOT
   1 RANDOM PATH STEPS
   1 RANDOM ERRORS
   1 RANDOM ERROR
   1 RACING    
   1 R;"to kill."
   1 Precision shooting !
   1 Polaris Sunk
   1 Player's INPUT
   1 Player Win
   1 Player Score
   1 PRINTS HANDS
   1 PRESS G TO GO TO GAME
   1 PRESS ANY KEY WHEN READY
   1 POKER     
   1 PLAYER STARTS
   1 PIECE CONTROLS
   1 PICTURE CARDS
   1 PICKS SUIT
   1 PICKS CARD VALUE
   1 ONE HAND AT A TIME
   1 OFF THE EDGE ?
   1 Number of games
   1 NOTE INK COLOURS
   1 NO CREDIT.BET AGAIN.
   1 MUCH MEMORY IS LEFT
   1 MOVEMENT DEPENDS ON    DIRECTION
   1 MOVE BAT ?
   1 MOVE - WHICH WAY ?
   1 Loop starts here
   1 Letters in squares
   1 LINE 5000 SHOWS HOW 
   1 LEFT OR RIGHT
   1 Key contact ?
   1 KEY CONTACT ?
   1 Index or Game ?
   1 If no move yet made
   1 IS THE SQUARE EMPTY ?
   1 INTRODUCTION
   1 INSTRUCTIONS
   1 INKEY$ CHECKS
   1 INCIDENTS AT 2000
   1 IF vessel hit ch=1
   1 IF IT IS BRIGHT IT IS  "SOLID"
   1 Hunter Sunk
   1 HUNTER    
   1 HOW MANY OF A KIND
   1 HAND VALUES
   1 Graphics Definition
   1 GOTO 300 for the game.
   1 GAME INSTRUCTIONS
   1 Full House ?
   1 Front Page
   1 Found winning line!
   1 Finds hit ( Z(D,L,C)=2)
   1 Find any hole when all else fails
   1 Fills a line
   1 FULLY SORTED. READY TO PLAY.
   1 FRONT PAGES
   1 FRONT PAGE
   1 FOR RUB-OUT
   1 FIRST PAGE
   1 FIRST MOVE ?
   1 FIRING BUTTON
   1 FALSE TAILS
   1 FACE VALUE
   1 End of loop
   1 ELAPSED TIME
   1 EDGE AND HOLE ATTR>64
   1 Draws frame
   1 DRAWS TRACK ON SCREEN
   1 DRAWS FRAME
   1 DRAWS DICE
   1 DRAW. Bets cancelled.
   1 DRAGON    {!R
   1 DOWN OR UP
   1 DOWN LINES
   1 DIRECTED MOVEMENT
   1 DICE ROLLING
   1 DATA PRINT OUT
   1 D;" Square ";
   1 D(P,T)=D(P,T+3
   1 D(P,T)=D(P,T+2
   1 D(P,T)=D(P,T+1
   1 D(P,N)=D(P,N+1
   1 D$(H,N,2)=CARD VALUE
   1 D$(H,N,1)=SUIT GRAPHIC
   1 D$(H,N)=D$(H,N+1
   1 Computer's SUBS
   1 Computer win
   1 Computer Score
   1 Comp. has Sunk one
   1 Comp. Sunk
   1 Checking array
   1 CROSSES   -
   1 CP=YOUR CASH
   1 COMPUTER WINS
   1 COMPUTER STARTS
   1 COMPARE D WITH INK CODE
   1 CLOSE LOOP
   1 CHECKS NOT USED ALREADY
   1 CHECKS FOR ANY LEFT
   1 CHECK FOR HIT
   1 CHECK ATTRIBUTES
   1 CENTRE SQUARE
   1 CC=MY CASH
   1 CARDS     
   1 CAR CO-ORDINATES
   1 CAPITAL LETTERS
   1 Bonus Value
   1 BLACKHOLE S
   1 BLACK HOLE
   1 BL1,BC1;" "
   1 BINARY ATOMIC TRANSPORTER
   1 BAT LINE AND COLUMN
   1 BAT ATTR =58
   1 BASES-NOTE-ALL "BRIGHT"
   1 Assorted Silly noises
   1 Animals  Dead Ducks       Riddled Rabbits
   1 ALL BRIGHT
   1 ACROSS LINES
   1 ;g;" coins."
   1 ;"your gold.":
   1 ;"wounded.  ";
   1 ;"use of ATTRIBUTES."
   1 ;"to move the gun (+)."
   1 ;"stop it."
   1 ;"show how to move ""Targets"" and"
   1 ;"pieces or ";
   1 ;"or ""G"" for the example game."
   1 ;"long straw"
   1 ;"his gold. ":
   1 ;"gamble.   "
   1 ;"dropped   ";
   1 ;"coins.   "
   1 ;"burnt up  ";
   1 ;"and move graphics in 4 ways."
   1 ;"about it. "
   1 ;"You won.":
   1 ;"You start."
   1 ;"You lost.":
   1 ;"You lost. ";
   1 ;"You have got ";m;" gold pieces."
   1 ;"You have  ";
   1 ;"You get   ";
   1 ;"You can have first shot.   "
   1 ;"You are   ";
   1 ;"YOUR BET `";BP
   1 ;"YOU WIN."
   1 ;"YOU WILL SEE 12 TARGETS."
   1 ;"YOU MAY LIKE TO LIST THIS."
   1 ;"YOU MAY FIND IT USEFUL TO LOOK"
   1 ;"Work your way through the lair. You won't know where things are until you bump into them."
   1 ;"Where are your subs ?"
   1 ;"WILD DUCKS":
   1 ;"WALL !!":
   1 ;"Variables....................400"
   1 ;"VARIABLES...................500"
   1 ;"Use Keys 5 to 8 to move your man"
   1 ;"This program shows how to turn"
   1 ;"This program demonstrates the";
   1 ;"This is the basic character..."
   1 ;"This is a working diagram to "
   1 ;"They are UDG's with character   code numbers 144,145,146 and 147"
   1 ;"These 4 characters are used..."
   1 ;"There's treasure to be found anddragons and goblins to meet."
   1 ;"Target Line  ";tl;" ":
   1 ;"Target Column ";tc+1
   1 ;"TRY TO LAND YOUR SPACESHIP IN "
   1 ;"TRY MOVING":
   1 ;"THROUGH THE LISTING."
   1 ;"THIS PROGRAM SHUFFLES,DEALS AND"
   1 ;"THERE ARE LOTS OF REMS TO HELP"
   1 ;"THE HEART OF THIS PROGRAM "
   1 ;"THE B.A.T."
   1 ;"THE ""ARROW""   KEYS "
   1 ;"THANKS FOR THE GAME."
   1 ;"TEN   2"
   1 ;"TARGET":
   1 ;"TARGET SHOOTING"
   1 ;"TARGET ROUTINE.........400"
   1 ;"Score over";
   1 ;"SUBMARINES"
   1 ;"STOP.............2505"
   1 ;"SPEED ADJUSTMENTS......480"
   1 ;"SORTS A PACK OF CARDS."
   1 ;"SHIP MOVEMENT.............445"
   1 ;"SHIP BOUNCE ROUTINES.....2000"
   1 ;"SCORE = 
   1 ;"RABBITS":
   1 ;"QUEEN 4"
   1 ;"Press keys  
   1 ;"Press any key to start.":
   1 ;"Press any key to spin it.":
   1 ;"Press any key to go on.":
   1 ;"Press ""P"" for Program Index"
   1 ;"Pick the  ";
   1 ;"Pay ";g;"    ";
   1 ;"PRINTED YOURS !"
   1 ;"PRESS KEYS":
   1 ;"PRESS ANY KEY TO WATCH."
   1 ;"PRESS ANY KEY TO GO ON.":
   1 ;"PRESS ANY KEY TO GO ON."
   1 ;"PRESS ""T"" TO TAKE OFF":
   1 ;"POKER DICE":
   1 ;"One moment please."
   1 ;"ONE MOMENT PLEASE"
   1 ;"NOW THEY NEED SORTING"
   1 ;"NOUGHTS & CROSSES"
   1 ;"NINE  1"
   1 ;"Movement loop................450"
   1 ;"Move by entering "
   1 ;"More GOLD"
   1 ;"MY TURN -              "
   1 ;"MY BET `";BC
   1 ;"MORE DAMAGE":
   1 ;"MINE. WE BOTH HAVE 6 SUBS."
   1 ;"LIST 170 to see the spin routine"
   1 ;"LINE 600 ONWARDS."
   1 ;"LANDED ?....................690"
   1 ;"KING  5"
   1 ;"Just hiding mine.Hang on."
   1 ;"JACK  3"
   1 ;"IS THE SORTING ROUTINE FROM                                    "
   1 ;"INKEY$ CHECKS..........500"
   1 ;"INDEX......................2000"
   1 ;"I am preparing a path for you.  It won't take long."
   1 ;"I WIN !!"
   1 ;"I WIN   ";
   1 ;"I PROMISE TO FORGET WHERE I HAVE"
   1 ;"He's dead.";
   1 ;"He has ";g;
   1 ;"HOW TO DRIVE YOUR CAR"
   1 ;"HOLD DOWN A KEY FOR FAST SORT"
   1 ;"HIDE YOUR SUBMARINES IN YOUR"
   1 ;"HERE THEY ARE";
   1 ;"HAND ";H
   1 ;"Gun Line  ";gl;" ":
   1 ;"Gun Column ";gc;" "
   1 ;"Graphics Definition..........290"
   1 ;"GRAPHICS DEFINITION........30"
   1 ;"GRAPHICS DEFINITION..........25"
   1 ;"GRAND PRIX"
   1 ;"GOTO 300 to move on.     "
   1 ;"GOOD LANDING":
   1 ;"GOLD ";m;"
   1 ;"GAME START................400"
   1 ;"GAME INSTRUCTIONS......300"
   1 ;"GAME BOARD................200"
   1 ;"Full House    50"
   1 ;"Flush KING -  75"
   1 ;"Flush ACE -   80"
   1 ;"FURTHER PAGES.......210,300,400"
   1 ;"FRONT PAGE..................105"
   1 ;"FIRE WHEN TARGET IS IN SIGHTS"
   1 ;"FACE VALUES."
   1 ;"Escaped...":
   1 ;"Each Pair     10"
   1 ;"EXPLAIN WHAT IS HAPPENING."
   1 ;"END OF GAME..............2500"
   1 ;"EDGE ROUTINE................650"
   1 ;"Draw Track....................30"
   1 ;"Don't feel";
   1 ;"Do you want instructions ?"
   1 ;"Depth ";
   1 ;"DRAGON'S LAIR"
   1 ;"DIRECTION 1"
   1 ;"DIRECTED MOVEMENT...........610"
   1 ;"DICE NUMBERS "
   1 ;"DETAILS ON THE NEXT PAGE."
   1 ;"DEPTH  1";
   1 ;"DAMAGE ";d
   1 ;"Controls.....................500"
   1 ;"Co-ordinate change...........550"
   1 ;"Check for crash..............590"
   1 ;"CRASHING -AS FAST AS YOU CAN."
   1 ;"CRASH!.......................610"
   1 ;"CONTROLS....................560"
   1 ;"COMMENTS,AND END ROUTINE...1000"
   1 ;"CLOCK...START.............415"
   1 ;"CHECK FOR HITS.........600"
   1 ;"CHECK FOR CONTACTS........465"
   1 ;"CASH `";CP
   1 ;"CASH `";CC
   1 ;"BUMP.CAREFUL":
   1 ;"BRAKE    ACCELERATOR"
   1 ;"BLOCK OF SEA ,THEN TRY TO FIND"
   1 ;"BLACK HOLE"
   1 ;"BEEP time .25"
   1 ;"BAT MOVER................1000"
   1 ;"ACE   6"
   1 ;"A TOTAL OF FOUR BASES -WITHOUT"
   1 ;"8 RIGHT"
   1 ;"6 DOWN":
   1 ;"5 of a kind  100"
   1 ;"5 LEFT":
   1 ;"4 of a kind   60"
   1 ;"3 of a kind   40"
   1 ;"3 MIDGETS OF 1 SQUARE 
   1 ;"2 HUNTER KILLERS,2 SQUARES 
   1 ;"1 POLARIS OF 3 SQUARES 
   1 ;"..wounded.":
   1 ;".......620"
   1 ;".......560";
   1 ;") letter.     "
   1 ;"""guns"" in shooting type games."
   1 ;"!!GOBLIN!!"
   1 ;"!!DRAGON!!"
   1 ;"!! CRASHED !!":
   1 ;" away.    ":
   1 ;" You got  ";
   1 ;" TIME ";T;" SECONDS "
   1 ;" SCORE ";S
   1 ;" MOVE THE GUN BY PRESSING":
   1 ;" A sword and shield will help if you meet a dragon."
   1 ;"  YOU WIN  "
   1 ;"  YOU   ";PS
   1 ;"  SCORE  "
   1 ;"  ME    ";CS
   1 ;"  GAME  ";n
   1 ;"  DRAW  "
   1 ;"   into the....."
   1 ;"   In this game you use your"
   1 ;"        YOUR TURN        ":
   1 ;"          "
   1 ;"               "
   1 ;"                     "
   1 ;"                       "
   1 ;"                                "
   1 2000 for PRINT position
   1 2 marks Hit 
   1 2 X's in a line
   1 1K+ WAS USED IN REMS
   1 1300 finds hit
   1 ..but only 5 times..
   1 ,x)=s(x,x)
   1 +x,y)=s(y,x)
   1 +p(l,c)*10
   1 ) to knock a spaceship "
   1 (SL,SC)=120
   1 (SL,SC)-64
   1 (CL,CC)>64
   1 (BL,BC)>64
   1 ("Polaris - square ";t);
   1 ("Midget ";t;"- depth ");
   1 ("Midget ";t;" - square ");
   1 ("Hunter-killer ";h;"- square ";t);
   1 ("Hunter-killer ";h;" - depth?");
   1 "yes or no please.";a$:
   1 "yes or no ?";a$:
   1 "YES OR NO PLEASE.";A$:
   1 "Which square ?";
   1 "Which letter ?";
   1 "Polaris - depth?";
   1 "PRESS ANY KEY TO SEE HANDS."
   1 "PAY or GAMBLE ?(P/G)";
   1 "Like another game ?";
   1 "Like a sword? 100 gold pieces.";
   1 "Left or Right? ( L or R)";
   1 "How much do you bet ? `";
   1 "Fight or Run ?(F/R)";
   1 "Depth ?";
   1 "BLACKHOLE"
   1 "Another game ?";a$
   1 "Another game ?";
   1 "ANOTHER GO ?(Y/N)";
   1 "ANOTHER GAME?";A$
   1 "ANOTHER GAME ?(Y/N)";A$
   1 "ANOTHER GAME ?(Y/N) ";
   1 "ANOTHER GAME ?";A$
   1 "ALL DEALT."''
   1 "A shield?100 pieces.";
   1 "  THIS TAKES ABOUT 20 SECONDS."''
   1 "  SHUFFLING
   1 "  I AM DEFINING GRAPHICS"
   1 "  HERE THEY COME"''
   1 "   DONE.":
   1  to start the game."
   1  to RUN the program."
   1  to End game";
   1  to ""fire""."
   1  for the Program Index"
   1  YOU WANT TO KEEP THEN PRESS  
   1  TO SPEED UP."
   1  TO SLOW DOWN."
   1  SORTING MY DICE
   1  ROLLING AGAIN. 
   1  PRESS THE NUMBERS OF THE ONES
   1  MACBRIDE 1983<<
   1  MAC BRIDE <<
   1  IS THE TRIGGER"
   1  ARE PAID FOR PAIRS,ETC."
   1  AND DEALING."'':
   1    MY GO NOW    
   1     PRESS ANY KEY TO GO ON.    
   1      PRESS ANY KEY TO GO ON.    
   1      PRESS ANY KEY TO GO ON     
   1       YOU WIN.       
   1        I WIN.       
   1                       "
   1             
   1